unit UnitInfoFrame;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, GSPInterface, UnitBaseFrame;

type
  TFrameInfo = class(TFrameBase)
  private
    { Private declarations }
  protected
    function GetCaption: string; override;
    function GetImageIndex: Integer; override;
  public
  end;

var
  FrameInfo: TFrameInfo;

implementation

{$R *.dfm}

{ TFrameHelp }

function TFrameInfo.GetCaption: string;
begin
  Result := '';
end;

function TFrameInfo.GetImageIndex: Integer;
begin
  Result := 6;
end;

end.
